home *** CD-ROM | disk | FTP | other *** search
/ PD Collection CD 1 / PD Collection CD 1.iso / textual / stronged / !StrongED_Modes_!News_Modefile < prev    next >
Encoding:
Text File  |  1996-08-27  |  1.8 KB  |  86 lines
  1.  
  2. # These are for the http:// recognition
  3.  
  4. #ID_FirstChar    A-Za-z_
  5. ID_Middle    A-Za-z_0-9./~+\-:?%@#
  6. #ID_LastChar    $%
  7.  
  8. SyntaxWords Group1 StartOfLine EndOfLine nocase
  9.     > :
  10. End
  11.  
  12. SyntaxWords Group2 StartOfLine EndOfLine nocase
  13.     From: To: Subject:
  14. End
  15.  
  16. SyntaxWords Group3 StartOfLine EndOfLine nocase
  17.     Path: Newsgroups: Date: Organization: Lines X- References:
  18.     Mime-Version: Content-Type: NNTP-Posting-Host: Message-ID:
  19.     Distribution: Originator:
  20. End
  21.  
  22.  
  23. SyntaxWords Group4 EndOfID nocase
  24.     http:// ftp:// mailto: telnet://
  25. End
  26.  
  27. #------------------------------------------------
  28.  
  29. Search
  30.     http    "http://" | "ftp://" | "mailto:" | "telnet://" {'A-Za-z_0-9./~+\-:?#@'}+
  31.     blankline    {' '} > Any
  32. End
  33.  
  34. ClickList
  35.     http    BroadcastURL("<tmp$word>")
  36. End
  37.  
  38. #------------------------------------------------
  39.  
  40. KeyList
  41.     ^R        Rot13()
  42. End
  43.  
  44. Functions
  45.  
  46.     Key    ⇧F2
  47.     Menu    Subjects  ⇧F2
  48.     Icon    lof
  49.     Select    ListOfFound ("Subject:",Text,After,Line,Case)
  50.  
  51.     Key    ⇧PgUp
  52.     Icon    up
  53.     Select    ListOfFound ("Subject:",Text,,Line,Case,GotoPrev)
  54.  
  55.     Key    ⇧PgDown
  56.     Icon    down
  57.     Select    ListOfFound ("Subject:",Text,,Line,Case,GotoNext)  Position(Top,4)
  58.  
  59.     Menu    From
  60.     Select    ListOfFound ("From:"   ,Text,After,Line,Case)
  61.  
  62.     ICON    wrap
  63.     key    ^P
  64.     Select    Replace (_wrap,_rwrap,,Noline)
  65.     Help    Wraps the current paragraph or the selected text.
  66.  
  67.     key    ^⇧P
  68.     Adjust    Replace (_wrap,_rwrap,text,Noline)
  69.  
  70.     ICON    unwrap
  71.     key    ^U
  72.     Select    unwrap(,70)
  73.     Help    Unwraps the current paragraph or the selected text.
  74.  
  75.     key    ^⇧U
  76.     Adjust    unwrap(text,70)
  77.  
  78.     Icon    sm!news
  79.     Select    Startoftext ListOfFound(blankline,text,,line,case,gotonext) BlockClear BlockMark_Standard EndofText BlockMark_Standard unwrap(block,70) BlockClear StartOftext killview
  80.     Help    Formats the selected text to 70 chars, saves it and kills the window.
  81.  
  82.     Adjust    ListOfFound(blankline,text,,line,case,gotonext)
  83.  
  84.     ⇧Adjust    unwrap(block,70)
  85.  
  86. End